PC World 2008 September/PCWorld_2008-09_cd.bin/domacnost a kancelar/recepty/InstalRecepty.exe/{app}/plugins/UserPlugin.txt

Text File | 2008-04-21 | 1KB | 51 lines

U₧ivatelsk² dopln∞k - popis

U₧ivatelskΘ dopl≥ky jsou externφ knihovny DLL.

Knihovny musφ exportovat tyto t°i funkce:
  function RD_Verze : LongInt stdcall; //verze pluginu
  function RD_Nazev : pChar stdcall; //nazev pluginu v menu programu
  function RD_Recept(aReceptNadpis : PAnsiChar; aReceptText : PAnsiChar; aReceptRTFText : PAnsiChar) : LongBool stdcall; //recept

Pokud mßte zßjem umφstit Vßmi vytvo°en² dopln∞k na www.fitlinie.cz/recepty
zaÜlete jej na email [e-mail]
Pop°φpad∞ o n∞m m∙₧ete dßt ostatnφm u₧ivatel∙m v∞d∞t na f≤ru www.fitlinie.cz/forum


------- zdrojov² k≤d knihovny v Delphi -----------------------------------------

library Test;

//testovaci plugin programu Recepty doma

uses
  SysUtils,
  Windows,
  Classes;

  function RD_Verze : LongInt stdcall; //verze pluginu
  begin
    Result := 1;
  end;

  function RD_Nazev : pChar stdcall; //nazev pluginu v menu programu
  begin
    Result := 'Testovacφ u₧ivatelsk² dopln∞k - jak na to...';
  end;

  function RD_Recept(aReceptNadpis : PAnsiChar; aReceptText : PAnsiChar; aReceptRTFText : PAnsiChar) : LongBool stdcall; //recept
  var S : String;
  begin
    Result := true;
    S := 'Popis struktury dopl≥ku naleznete v souboru \plugins\UserPlugin.txt' + Chr(13) + Chr(13) + aReceptText;
    MessageBox(0, pChar(S), aReceptNadpis, MB_OK);
  end;


exports
  RD_Verze name 'RD_Verze',
  RD_Nazev name 'RD_Nazev',
  RD_Recept name 'RD_Recept';
end.